home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / pascal / virtmem.exe / SECONDAR.INT < prev    next >
Text File  |  1992-10-09  |  931b  |  24 lines
  1. {Secondar}
  2. {Handles saving and recalling of files via the virtual memory system.}
  3. Unit Secondar;
  4.  
  5. Interface
  6.  
  7. {All virtual structures must be referenced via one virtual pointer
  8.  which is passed at the parameter "Everything" to these procedures.  If
  9.  the program uses other pointers to virtual structures that cannot be
  10.  accessed via EveryThing, the virtual pointers must be saved and recalled
  11.  by the program separately.  Normally all global pointers are grouped into
  12.  one dynamic record.}
  13. Procedure Save(EveryThing:LongInt);
  14. {Restore cannot be used successfully the first time a program is run.
  15.  Use VirtuMem.OpenBook the first time, and Restore successive times.  To
  16.  test if Restore can be used, look for the existence of the file HEAD.MEM.}
  17. {$IFDEF USEEMS}
  18. Procedure Restore(var EveryThing :LongInt;
  19.                       EMSSuppress:Boolean);
  20. {$ELSE}
  21. Procedure Restore(var EveryThing:LongInt);
  22. {$ENDIF}
  23.  
  24.